home *** CD-ROM | disk | FTP | other *** search
/ Aminet 30 / Aminet 30 (1999)(Schatztruhe)[!][Apr 1999].iso / Aminet / util / boot / selector90.lha / Selector / pref / back2 < prev    next >
Text File  |  1998-10-14  |  273b  |  15 lines
  1. getline env:selector.settings opa " buttoncol "
  2. chopword opa epa
  3. chopword opa fg
  4. if "$fg" EQ ""
  5.     setenv fg 1
  6. endif
  7.  
  8. selector >env:opa /pref/back.sel
  9.  
  10. if not "$opa" EQ ""
  11.     setenv epa "buttoncol $fg $opa"
  12.     changeline env:selector.settings epa " buttoncol "
  13. endif
  14.  
  15. unsetenv fg